home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / general / visulztn / saoimage / saoimage.lha / vms / install.com < prev    next >
Text File  |  1991-06-04  |  806b  |  19 lines
  1. $!=============================================================================
  2. $! INSTALL.COM -- Install SAOimage and configuration files.  This file
  3. $! should be run from [...saoimage.vms]; it can find the files it needs!
  4. $!=============================================================================
  5. $ if p1 .eqs. "" then inquire/nopunc p1 "Installation directory: "
  6. $ if p1 .eqs. "" then exit
  7. $ saodestdir = p1
  8. $!
  9. $ thisproc = f$environ("procedure")
  10. $ saovmsdir = f$parse(thisproc,,,"device") + f$parse(thisproc,,,"directory")
  11. $ saoimgdir = saovmsdir - ".VMS]" + "]"
  12. $!
  13. $ create/direc/log 'saodestdir'
  14. $ copy/log 'saoimgdir'saoimage.exe 'saodestdir'
  15. $ copy/log 'saovmsdir'saosetup.com 'saodestdir'
  16. $ copy/log 'saoimgdir'imtoolrc.    'saodestdir'
  17. $ copy/log 'saovmsdir'saoimage.hlp 'saodestdir'
  18. $ exit
  19.